(ispell-message): Delete excess (beginning-of-line) call.

diff --git a/lisp/textmodes/ispell4.el b/lisp/textmodes/ispell4.el
index cdde7d94ce3947a6dcf196bf9548e8c2eed047ba..6ec6ba2775d7f9f06db82078188e136c2ba694c5 100644 (file)
--- a/lisp/textmodes/ispell4.el
+++ b/lisp/textmodes/ispell4.el
@@ -998,7 +998,6 @@ Or you can bind the function to C-c i in gnus or mail with:
               (if (re-search-forward
                    (concat "^\\(" cite-regexp "\\)") nil 'end)
                   (beginning-of-line))
-               (beginning-of-line)
                (let ((case-fold-search old-case-fold-search))
                  (save-excursion
                    (setq continue (ispell-region (- start 1) (point))))))))))))